home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 22
/
Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso
/
Aminet
/
util
/
time
/
EngClock86.lha
/
EngClock86
/
Install_EngClock
< prev
next >
Wrap
Text File
|
1997-09-09
|
4KB
|
194 lines
; EngClock v8.0 installation script
; $VER: Install_EngClock v1.0
; Script by Ben Matthew 23/09/96
(set Triton-Version ( / (getversion "libs:triton.library") 65536))
(set Trans-Version (/ (getversion "libs:translator.library") 65536))
(set Data-Version (/ (getversion "libs:datatypes/sound.datatype") 65536))
(set CPU-Version (database "cpu"))
(set UseTriton 0)
(if (< CPU-Version 68020)
(abort "You need at least a 68020 processor to use EngClock!")
)
(set DestDir (askdir
(prompt ("Where would you like to install English Clock ?"))
(default "sys:wbstartup")
(help "Choose a directory to place in main executable")
))
(copyfiles
(source "")
(dest DestDir)
(files)
(infos)
(pattern "EngClock")
(prompt "Copying main executables...")
(help "Nothing to worry about")
(confirm)
)
(set ModDir (tackon DestDir "modules"))
(makedir ModDir)
(copyfiles
(source "modules")
(dest ModDir)
(files)
(infos)
(pattern "#?.langmod")
(prompt "Copying language modules...")
(help "Nothing to worry about")
(confirm)
)
(set DocDir (askdir
(prompt "Where shall I install the documentation ?")
(default "help:")
(help "Choose a directory for the AmigaGuide help")
))
(copyfiles
(source "")
(dest DocDir)
(files)
(infos)
(pattern "EngClock.guide")
(prompt "Copying AmigaGuide help...")
(help "Nothing to worry about")
(confirm)
)
(if (< Trans-Version 42)
((copyfiles
(source "libs")
(dest "libs:")
(files)
(pattern "translator.library")
(confirm)
(help "None")
(prompt "Copying new fangled (v42) translator.library")
)
(copyfiles
(source "locale/accents")
(dest "locale:accents")
(files)
(pattern "#?")
(confirm)
(help "None")
(prompt "Copying associated accents for translator.library")
))
)
(if (< Data-Version 40)
(copyfiles
(source "libs/datatypes")
(dest "libs:datatypes")
(files)
(pattern "sound.datatype")
(confirm)
(help "None")
(prompt "Copying new sound.datatype!")
)
)
(if (not (exists "devs:narrator.device"))
(copyfiles
(source "devs")
(dest "devs:")
(files)
(pattern "narrator.device")
(confirm)
(help "None")
(prompt "Copying across the old narrator.device")
)
)
(set PrefsDir DestDir)
((copyfiles
(source "triton")
(dest PrefsDir)
(files)
(pattern "EngPrefs")
(prompt "Copying Triton prefs executables...")
(help "Nothing to worry about")
(confirm)
)
(if(< Triton-Version 6)
(copyfiles
(source "libs")
(dest "libs:")
(files)
(pattern "triton.library")
(confirm)
(help "None")
(prompt "Copying triton GUI interface library")
)
))
(makedir (tackon PrefsDir "catalogs"))
(makedir (tackon PrefsDir "catalogs/español"))
(makedir (tackon PrefsDir "catalogs/français"))
(copyfiles
(source "catalogs/español")
(dest (tackon PrefsDir "catalogs/español"))
(files)
; (infos)
(all)
(prompt "Copying prefs catalogs...")
(help "Nothing to worry about")
(confirm)
)
(copyfiles
(source "catalogs/français")
(dest (tackon PrefsDir "catalogs/français"))
(files)
; (infos)
(all)
(prompt "Copying prefs catalogs...")
(help "Nothing to worry about")
(confirm)
)
(if (exists("s:engclock.prefs"))
((delete "s:engclock.prefs"
(prompt "Deleting old preferences")
(confirm)
(help "None")
)))
(message
(cat
"English Clock has now been installed onto your\n"
"system. In order to get the most out of the\n"
"package you will need to configure the huge\n"
"amounts of preferences to suit exactly what you\n"
"want. Don't worry tho' because it will run with\n"
"or without settings. It would be sensible to run\n"
"the program now and select the menu option Set\n"
"Prefs. Please remember that in order for this\n"
"menu option to work the EngPrefs program must \n"
"exist in a path that AmigaDOS will check, ie.:\n\n"
"C:, sys:prefs and so on. "
)
)
(message
(cat
"If you have any problems installing English Clock or would like to "
"make a suggestion for new releases please contact me by Email at:\n\n"
"ben@bmatthew.demon.co.uk\n\n"
"And don't forget the new about EngClock's new WWW home page. Fint it at:\n\n"
"http://www.bmatthew.demon.co.uk/amiga/engclock.html\n\n"
"Hope you enjoy the program!"
)
)